function [discount,beca,stipend] = u40_2012(math,lang,demrecode)
%% Universidad Finis Terrae
lm=(math+lang)/2;
discount=zeros(size(lm,1),1);
beca=zeros(size(lm,1),1);
stipend=zeros(size(lm,1),1);

%BVP
if demrecode==40050 || demrecode==40051
    [discount,stipend]=bvp(lm);
end
end
